Imports System
Module qs


    Sub add(ByVal a As Integer, ByVal b As Integer)
        Console.WriteLine(a + b)
    End Sub

    Sub Main()
        add(1,2)
        Console.ReadKey()
    End Sub 

End Module
